10 POKE56,160:POKE55,0:CLR:POKE649,15:F$="BASIC MUSIC"
20 POKE53280,15:POKE53281,15:PRINT"[147][155]LOAD";CHR$(34);F$;CHR$(34);",8"
30 PRINT"          LOADING BASIC MUSIC"
40 PRINT"           ONE MOMENT PLEASE[155]"
50 A$=CHR$(13)+"R[213]"+CHR$(13)+"L[207]"+CHR$(34)+"F"+CHR$(34)+",8"+CHR$(13)+"R[213]"
55 A$=A$+CHR$(13)
60 FORI=1TOLEN(A$):POKE630+I,ASC(MID$(A$,I)):NEXT:POKE198,I-1
70 NEW